Easy Internet/Internet Training Corporation Easy Internet Rev21 (ITC).ISO/mac/DATA/1001.scp

Text File | 1997-07-03 | 248b | 30 lines

@ANSWER
@HANGUP
EXIT 0
!
@ORIGINATE
!
CHRDELAY 1
!
@LABEL 10
MATCHCLR
MATCHSTR 1 11 " name: "
MATCHREAD 300
!
@LABEL 11
WRITE "^u\13"
!
@LABEL 12
MATCHCLR
MATCHSTR 1 13 " word: "
MATCHREAD 300
!
@LABEL 13
WRITE "^p\13"
!
@LABEL 14
PAUSE 1
EXIT 0